home *** CD-ROM | disk | FTP | other *** search
/ MacFormat 1994 October / Macformat17.cdr / Shareware City / HyperCard / hyper-extras-hc / HyperExtras / HyperExtras.rsrc / TEXT_3009_repHEXText.txt < prev    next >
Encoding:
Text File  |  1994-07-11  |  310 b   |  15 lines
  1. global HEXInfo
  2.   if HEXInfo is empty then
  3.     answer "No info in global HEXInfo"
  4.     exit to hypercard
  5.   end if
  6.   put word 1 of HEXInfo into x
  7.   if there is a window x then
  8.     if the optionKey is down then
  9.       chooseHEX
  10.     else
  11.       set text of window x to HEXInfo
  12.     end if
  13.   else
  14.     chooseHEX
  15.   end if